home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Merciful 2
/
Merciful - Disc 2.iso
/
software
/
d
/
databasev3.1reg.lha
/
db3.1
/
Examples
/
ARexxDemos
/
integerfield.db
< prev
next >
Wrap
Text File
|
1994-11-20
|
166b
|
8 lines
/* Rexxprogram for db to force a field to contain an integer.
* By Anders Callertun 1994
*/
options results
GETFIELD
if datatype(result,'Whole')=0 then RETRYINPUT